home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / ISSUE07 / HTMLVIEW / HTMLVIEW.ZIP / DEMOSRC.ZIP / DEMOUNIT.DFM / DEMOUNIT.txt
Encoding:
Text File  |  1995-12-22  |  3.4 KB  |  164 lines
  1. object Form1: TForm1
  2.   Left = 215
  3.   Top = 108
  4.   Width = 555
  5.   Height = 395
  6.   Caption = 'HTML Demo, Version 2.0 '
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   Menu = MainMenu
  12.   PixelsPerInch = 96
  13.   Position = poDefaultPosOnly
  14.   OnCreate = FormCreate
  15.   OnDestroy = FormDestroy
  16.   OnShow = FormShow
  17.   TextHeight = 16
  18.   object Panel1: TPanel
  19.     Left = 0
  20.     Top = 330
  21.     Width = 547
  22.     Height = 19
  23.     Align = alBottom
  24.     Alignment = taLeftJustify
  25.     BevelInner = bvLowered
  26.     BevelOuter = bvNone
  27.     TabOrder = 0
  28.   end
  29.   object Panel2: TPanel
  30.     Left = 0
  31.     Top = 0
  32.     Width = 547
  33.     Height = 33
  34.     Align = alTop
  35.     BevelOuter = bvNone
  36.     TabOrder = 1
  37.     object Edit1: TEdit
  38.       Left = 190
  39.       Top = 4
  40.       Width = 337
  41.       Height = 24
  42.       TabStop = False
  43.       ReadOnly = True
  44.       TabOrder = 0
  45.     end
  46.     object Reload: TButton
  47.       Left = 10
  48.       Top = 4
  49.       Width = 59
  50.       Height = 24
  51.       Caption = '&Reload'
  52.       Enabled = False
  53.       TabOrder = 1
  54.       OnClick = ReloadClick
  55.     end
  56.     object BackButton: TButton
  57.       Left = 69
  58.       Top = 4
  59.       Width = 59
  60.       Height = 24
  61.       Caption = '&Back'
  62.       Enabled = False
  63.       TabOrder = 2
  64.       OnClick = FwdBackClick
  65.     end
  66.     object FwdButton: TButton
  67.       Left = 128
  68.       Top = 4
  69.       Width = 59
  70.       Height = 24
  71.       Caption = '&Forward'
  72.       Enabled = False
  73.       TabOrder = 3
  74.       OnClick = FwdBackClick
  75.     end
  76.   end
  77.   object Panel3: TPanel
  78.     Left = 0
  79.     Top = 33
  80.     Width = 547
  81.     Height = 297
  82.     Align = alClient
  83.     BevelInner = bvLowered
  84.     BevelOuter = bvNone
  85.     Caption = 'Panel3'
  86.     TabOrder = 2
  87.     object Viewer: THTMLViewer
  88.       Left = 1
  89.       Top = 1
  90.       Width = 545
  91.       Height = 295
  92.       OnHotSpotCovered = HotSpotChange
  93.       OnHotSpotClick = HotSpotClick
  94.       OnHistoryChange = HistoryChange
  95.       ViewImages = False
  96.       TabStop = True
  97.       TabOrder = 0
  98.       Align = alClient
  99.       BorderStyle = bsNone
  100.       HistoryMaxCount = 6
  101.       DefFontName = 'Times New Roman'
  102.     end
  103.   end
  104.   object OpenDialog: TOpenDialog
  105.     DefaultExt = 'htm'
  106.     Filter = 'html files|*.htm|all files|*.*'
  107.     Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
  108.     Left = 393
  109.     Top = 2
  110.   end
  111.   object MainMenu: TMainMenu
  112.     Left = 355
  113.     Top = 4
  114.     object File1: TMenuItem
  115.       Caption = '&File'
  116.       object Open: TMenuItem
  117.         Caption = '&Open'
  118.         OnClick = OpenFileClick
  119.         ShortCutText = 'F3'
  120.       end
  121.       object Print1: TMenuItem
  122.         Caption = '&Print...'
  123.         Enabled = False
  124.         OnClick = Print1Click
  125.       end
  126.       object N1: TMenuItem
  127.         Caption = '-'
  128.       end
  129.       object Exit: TMenuItem
  130.         Caption = 'E&xit'
  131.         OnClick = ExitClick
  132.       end
  133.     end
  134.     object options1: TMenuItem
  135.       Caption = '&Options'
  136.       object ShowImages: TMenuItem
  137.         Caption = '&Show images'
  138.         OnClick = ShowImagesClick
  139.       end
  140.       object Fonts: TMenuItem
  141.         Caption = 'Default &Font/Colors...'
  142.         OnClick = FontColorsClick
  143.       end
  144.     end
  145.     object HistoryMenuItem: TMenuItem
  146.       Caption = '&History'
  147.       Visible = False
  148.     end
  149.     object About1: TMenuItem
  150.       Caption = '&About'
  151.       OnClick = About1Click
  152.     end
  153.   end
  154.   object PrintDialog: TPrintDialog
  155.     FromPage = 1
  156.     MinPage = 1
  157.     MaxPage = 9999
  158.     Options = [poPageNums]
  159.     ToPage = 1
  160.     Left = 434
  161.     Top = 1
  162.   end
  163. end
  164.